30 POKE56,48:POKE52,48:CLR
35 IFPEEK(16375)=8THEN700
38 PRINT"[147]PREPARING MACHINE LANGUAGE..."
40 POKE53265,27:POKE56334,PEEK(56334)AND254:POKE1,PEEK(1)AND251:FORI=.TO79
42 POKE14720+I,PEEK(53632+I):NEXT:POKE1,PEEK(1)OR4:POKE56334,PEEK(56334)OR1
44 FORI=53104TO53151:POKEI,1:NEXT
45 I=.:Z=.
46 READA:IFA<0THEN48
47 POKE49152+I,A:Z=Z+A:I=I+1:GOTO46
48 IFZ<>160018THENPRINT"ERROR IN CODE DATA":STOP
49 I=.:Z=.
50 READA:IFA<0THEN52
51 POKE53152+I,A:Z=Z+A:I=I+1:GOTO50
52 IFZ<>4625THENPRINT"ERROR IN VARIABLE DATA":STOP
53 I=.:Z=.
54 READA:IFA<0THEN56
55 POKE14336+I,A:Z=Z+A:I=I+1:GOTO54
56 IFZ<>55366THENPRINT"ERROR IN CHARACTER DATA":STOP
57 I=.:Z=.
58 READA:IFA<0THEN60
59 POKE15936+I,A:Z=Z+A:I=I+1:GOTO58
60 IFZ<>25190THENPRINT"ERROR IN SPRITE DATA":STOP
62 GOTO700
100 REM*****SET-UP PLAYFIELD*****
105 POKE53265,11
110 PRINT"[147]":POKE53280,5:POKE53281,3:POKE53269,.:POKE53270,PEEK(53270)OR16
120 POKE53272,30:POKE53275,.:POKE53276,3:POKE53282,1:POKE53283,.:POKE53285,1
130 POKE53286,.:POKE53287,6:POKE53288,11
140 FORI=56136TO56295:POKEI,14:NEXT:FORI=55656TO55659:POKEI,14:POKEI+40,14:NEXT
150 FORI=55692TO55695:POKEI,8:POKEI+40,8:NEXT
160 POKE1234,36:POKE1235,37:POKE1274,38:POKE1275,39:POKE55506,1:POKE55507,1
170 POKE55546,1:POKE55547,1:POKE1211,36:POKE1212,37:POKE1251,38:POKE1252,39
180 POKE55483,1:POKE55484,1:POKE55523,1:POKE55524,1
190 FORI=1384TO1387:POKEI,I-1363:NEXT:FORI=1424TO1426:POKEI,I-1399:NEXT
200 FORI=1420TO1423:POKEI,I-1392:NEXT:FORI=1461TO1463:POKEI,I-1428:NEXT
210 FORI=1864TO1882:POKEI,40:POKEI+40,40:POKEI+80,40:NEXT
220 FORI=1984TO2023:POKEI,40:NEXT
230 POKE52992,140:POKE52993,140:POKE52994,96:POKE52995,240:POKE52996,.
240 POKE52997,.:Z=PEEK(53278):FORI=53072TO53103:POKEI,.:NEXT:POKE53036,.
250 POKE53269,3:POKE53037,.
260 POKE53211,255:POKE53212,255:POKE53213,12:POKE54296,79:POKE54294,55
270 POKE54295,129:POKE54277,128:POKE54278,240:POKE54276,129:POKE54273,255
280 POKE54284,128:POKE54285,240:POKE54283,17:POKE1025,48:POKE1026,48:POKE1061,48
290 POKE1062,48:POKE55297,6:POKE55298,6:POKE55333,.:POKE55334,.:POKE53044,.
300 POKE53045,.:POKE53265,27
500 SYS50237
510 PRINT"[147]":POKE53272,21:FORI=54272TO54296:POKEI,.:NEXT:POKE53281,6
515 L=PEEK(53044):R=PEEK(53045):POKE53269,.
520 IFL>HSTHENHS=L
522 IFR>HSTHENHS=R
525 IFL>RTHENPRINTTAB(08)"THE LEFT (BLUE) PLAYER WON!":GOTO535
527 IFL<RTHENPRINTTAB(08)"THE RIGHT (BLACK) PLAYER WON!":GOTO535
530 PRINTTAB(16)"IT'S A TIE!"
535 PRINTTAB(15)"LEFT SCORE="L:PRINTTAB(14)"RIGHT SCORE="R
540 FORI=1TO5000:NEXT
700 POKE53280,5:POKE53281,3:PRINT"[147]":PRINTTAB(15)"[144]SALMON RUN"
705 PRINTTAB(19)"BY":PRINTTAB(15)"MIKE WACKER":PRINT"HIGH SCORE= "HS
707 PRINTTAB(12)"PRESS F1 TO PLAY"
710 POKE53248,174:POKE53249,210:POKE53264,.:POKE53269,1:POKE53287,6:X(3)=253
712 POKE53276,1:POKE53285,1:POKE53286,.:A=10:B=.:X(.)=254:X(1)=253:X(2)=252
714 GETZ$:IF Z$="" THEN 714
716 IF Z$="[133]" THEN 100
718 A=10:B=B+1:IFB=4THENB=.
720 POKE2040,X(B):GOTO714
999 REM****CODE DATA****
1000 DATA133,169,134,140,132,141,166,169,202,16,2,166,169,198,139,208,247,173
1002 DATA18,208,133,139,138,72,166,140,164,141,104,96,254,14,207,208,3,254,17
1004 DATA207,189,17,207,240,21,189,14,207,201,88,208,14,169,.,157,84,207,173
1006 DATA21,208,61,172,207,141,21,208,96,173,4,207,141,46,207,173,.,208,141,47
1008 DATA207,173,1,208,141,48,207,208,18,173,5,207,141,46,207,173,2,208,141,47
1010 DATA207,173,3,208,141,48,207,173,46,207,221,17,207,208,17,173,47,207,56,253
1012 DATA14,207,176,2,73,255,201,24,176,36,144,31,173,46,207,208,11,173,47,207
1014 DATA56,253,14,207,144,20,176,9,189,14,207,56,237,47,207,144,9,73,255,201
1016 DATA24,176,3,169,1,96,169,.,96,206,49,207,208,59,206,128,207,208,54,169
1018 DATA4,141,128,207,206,129,207,173,129,207,106,162,2,176,17,189,187,207,32
1020 DATA45,196,189,190,207,157,131,7,189,193,207,208,15,189,196,207,32,54,196
1022 DATA189,199,207,157,131,7,189,202,207,157,171,7,202,16,216,206,130,207,240
1024 DATA1,96,169,160,32,182,196,173,87,207,240,16,169,.,141,87,207,141,51,207
1026 DATA169,7,141,50,207,141,89,207,173,89,207,240,35,206,50,207,16,7,169,.,141
1028 DATA89,207,240,16,174,50,207,173,51,207,208,5,189,205,207,208,3,189,212,207
1030 DATA141,7,212,141,8,212,96,173,88,207,240,250,169,.,141,88,207,169,1,208
1032 DATA191,162,1,222,112,207,240,3,76,36,194,189,80,207,208,11,189,82,207,208
1034 DATA3,169,48,44,169,88,44,169,18,157,112,207,189,80,207,240,20,189,.,207
1036 DATA201,197,208,7,169,.,157,80,207,240,6,254,.,207,76,246,193,188,.,220
1038 DATA152,41,1,208,10,189,.,207,201,69,240,3,222,.,207,152,41,2,208,10,189
1040 DATA.,207,201,197,240,3,254,.,207,152,41,4,208,25,189,4,207,208,7,189,2,207
1042 DATA201,24,240,13,222,2,207,189,2,207,201,255,208,3,222,4,207,152,41,8,208
1044 DATA20,189,4,207,240,7,189,2,207,201,64,240,8,254,2,207,208,3,254,4,207,152
1046 DATA41,16,208,10,189,.,207,201,102,176,3,157,80,207,222,114,207,208,15,169
1048 DATA8,157,114,207,222,116,207,16,5,169,3,157,116,207,188,116,207,189,80,207
1050 DATA240,4,169,255,208,3,185,160,207,157,248,7,138,10,168,189,2,207,153,.
1052 DATA208,189,.,207,153,1,208,172,16,208,189,4,207,240,6,152,29,164,207,208
1054 DATA4,152,61,166,207,141,16,208,202,48,3,76,61,193,96,162,2,189,84,207,208
1056 DATA56,206,7,207,240,3,76,31,196,206,118,207,208,248,169,13,141,118,207,157
1058 DATA84,207,169,.,157,8,207,157,11,207,157,14,207,157,17,207,169,218,157,20
1060 DATA207,169,5,32,.,192,157,23,207,169,1,32,.,192,157,26,207,222,119,207
1062 DATA208,200,234,234,234,234,234,234,189,11,207,240,75,169,64,157,119,207
1064 DATA189,29,207,240,13,222,32,207,208,54,169,.,157,29,207,157,35,207,189,35
1066 DATA207,240,18,222,20,207,222,38,207,208,33,169,5,157,29,207,157,32,207,208
1068 DATA23,32,38,196,32,164,196,208,11,192,218,208,11,169,.,157,11,207,240,4
1070 DATA192,235,240,245,32,30,192,76,85,195,189,8,207,240,89,169,32,157,119,207
1072 DATA189,41,207,10,168,185,.,208,157,14,207,185,1,208,24,105,13,157,20,207
1074 DATA188,41,207,185,4,207,157,17,207,189,14,207,217,168,207,208,44,189,17
1076 DATA207,217,170,207,208,36,189,20,207,201,109,176,29,141,87,207,169,.,153
1078 DATA82,207,157,84,207,173,21,208,61,172,207,141,21,208,189,26,207,24,105
1080 DATA1,153,44,207,76,85,195,169,64,157,119,207,189,14,207,201,160,208,21,234
1082 DATA234,234,169,.,157,29,207,169,40,157,38,207,157,11,207,157,35,207,208
1084 DATA14,173,18,208,201,37,176,7,169,7,32,.,192,240,224,32,30,192,189,84,207
1086 DATA208,3,76,31,196,173,6,207,61,175,207,240,69,173,6,207,41,1,240,41,173
1088 DATA80,207,240,36,32,65,192,240,31,169,.,157,41,207,168,189,23,207,208,5
1090 DATA169,1,153,82,207,169,.,157,11,207,169,1,157,8,207,141,88,207,208,21,173
1092 DATA6,207,41,2,240,14,173,81,207,240,9,32,85,192,240,4,169,1,208,206,222
1094 DATA122,207,208,13,169,10,157,122,207,189,125,207,73,1,157,125,207,188,125
1096 DATA207,189,11,207,208,5,189,8,207,240,5,185,178,207,208,13,189,26,207,208
1098 DATA5,185,180,207,208,3,185,182,207,157,250,7,173,21,208,29,175,207,141,21
1100 DATA208,189,23,207,208,3,169,.,44,169,1,157,41,208,169,208,133,252,189,184
1102 DATA207,133,251,189,14,207,160,.,145,251,200,189,20,207,145,251,172,16,208
1104 DATA189,17,207,240,6,152,29,175,207,208,4,152,61,172,207,141,16,208,202,48
1106 DATA3,76,45,194,96,254,20,207,188,20,207,96,157,91,7,169,19,141,174,7,96
1108 DATA157,91,7,169,20,208,245,32,165,192,32,43,194,32,59,193,172,44,207,240
1110 DATA34,169,.,141,44,207,152,24,109,52,207,141,52,207,238,2,4,173,2,4,201,58
1112 DATA208,8,169,48,141,2,4,238,1,4,136,208,235,172,45,207,240,34,169,.,141,45
1114 DATA207,152,24,109,53,207,141,53,207,238,38,4,173,38,4,201,58,208,8,169,48
1116 DATA141,38,4,238,37,4,136,208,235,206,219,207,208,164,206,220,207,208,159
1118 DATA206,221,207,208,154,96,189,17,207,208,12,189,14,207,201,160,176,3,169
1120 DATA.,44,169,1,96,141,130,207,173,30,208,141,6,207,96,-1
1122 REM****VARIABLES****
1124 DATA252,253,254,253,1,2,254,253,24,64,.,1,251,247,239,4,8,16,250,251,250
1126 DATA250,249,249,4,6,8,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,32,30
1128 DATA27,23,18,12,5,6,13,19,24,28,31,33,112,142,6,-1
1130 REM****PROGRAMABLE CHARACTERS****
1132 DATA.,.,.,.,.,.,.,.,255,223,247,247,247,255,127,255,192,252,255,223,245,255
1134 DATA255,255,.,.,.,.,.,64,192,192,247,253,255,253,245,247,247,253,255,247
1136 DATA253,253,255,127,255,127,192,240,240,192,64,65,116,240,223,255,127,255
1138 DATA223,247,253,253,255,223,213,127,223,223,215,247,240,240,252,252,223,247
1140 DATA247,255,255,95,247,253,255,223,247,253,192,252,255,255,255,255,255,255
1142 DATA.,.,.,.,64,208,192,192,247,247,253,255,255,255,253,253,223,223,127,223
1144 DATA247,255,255,255,80,244,241,192,192,192,240,240,255,127,127,221,221,223
1146 DATA223,223,127,223,255,255,255,127,223,255,240,241,84,124,221,255,247,255
1148 DATA20,64,64,68,17,64,1,20,16,64,1,84,.,80,5,64,63,253,250,255,255,253,63
1150 DATA15,239,255,119,239,111,239,255,255,255,223,175,235,250,95,255,255,112
1152 DATA212,252,252,252,252,240,192,.,.,.,3,15,63,255,255,15,63,255,255,255,240
1154 DATA192,.,.,192,192,192,.,.,.,.,63,253,250,255,255,253,63,15,247,255,238
1156 DATA247,246,247,255,255,255,251,245,215,95,250,255,255,112,212,252,252,252
1158 DATA252,240,192,.,.,.,.,.,.,.,.,.,3,3,3,.,.,.,.,240,252,255,255,255,15,3,.
1160 DATA.,.,.,192,240,252,255,255,252,254,255,126,31,30,28,127,.,.,192,240
1162 DATA248,252,252,252,255,253,127,31,3,3,.,.,190,254,252,248,224,.,.,.,255
1164 DATA255,255,255,255,255,255,255,-1
1166 REM****SPRITE DATA****
1168 DATA.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,16,127,224,25,255,248,27,255
1170 DATA24,31,255,24,31,255,248,27,255,248,25,255,248,16,127,224,.,.,.,.,.,.,.
1172 DATA.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.
1174 DATA4,127,128,6,254,96,7,254,96,7,255,224,6,255,224,4,127,128,.,.,.,.,.,.
1176 DATA.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.
1178 DATA.,.,.,.,8,124,.,12,255,128,7,254,96,7,254,96,6,255,224,2,127,224,.,3,128
1180 DATA.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,40,.,.
1182 DATA166,.,130,42,2,160,10,10,160,8,10,170,40,170,170,170,170,170,170,170
1184 DATA170,170,170,42,170,168,42,187,168,40,179,40,.,51,.,.,51,.,.,192,192,.
1186 DATA192,192,3,51,48,.,.,.,.,.,.,.,.,.,.,.,.,.,.,40,.,.,166,.,2,42,.,.,10,.
1188 DATA.,8,.,10,40,160,42,170,168,42,170,168,170,170,170,170,170,170,170,187
1190 DATA170,40,179,40,40,51,40,.,51,.,.,192,192,.,192,192,3,51,48,.,.,.,.,.
1192 DATA.,.,.,.,.,.,.,.,.,40,.,.,166,.,2,42,.,.,10,.,.,8,.,10,40,160,42,170
1194 DATA168,42,170,168,42,170,168,42,170,168,170,187,170,168,179,42,168,51,42
1196 DATA160,51,10,128,192,194,.,192,192,3,51,48,.,128,192,194,128,51,2,128,51
1198 DATA2,160,51,10,168,51,42,168,179,42,170,187,170,42,170,168,42,170,168,42
1200 DATA170,168,42,170,168,10,40,160,.,8,.,.,10,.
1202 DATA.,42,.,.,38,.,.,42,.,.,8,.,.,8,.,.,.,.,.,.,.,.,-1